home *** CD-ROM | disk | FTP | other *** search
/ PC Relax 2004 #5 / PC Relax 5-2004.iso / AutoPlay / sextabu / banref.js < prev    next >
Text File  |  2004-06-22  |  673b  |  30 lines

  1. function banload(){
  2.   if(arguments.length==0){
  3.     checkreload('BANNER');
  4.   }else{
  5.     for (x=0; x<arguments.length; x++) {
  6.       B = 'BANNER'+arguments[x];
  7.       if(eval("document.all."+B)!=undefined){
  8.         checkreload(B);
  9.       }else{
  10.         checkreload('BANNER');
  11.       }
  12.     }
  13.   }
  14. }
  15.  
  16. function checkreload(name){
  17.   var B;
  18.   var R = Math.round(Math.random()*100000000);
  19.   for (i=0; i<document.all.length; i++) {
  20.     test = document.all[i].name;
  21.     if(test!=null && eval("test.search(/"+name+"/)") != -1 ){
  22.       S=document.all[i].src;
  23.       T=S.substring(S.indexOf ("transactionID=") + 14,255)
  24.       S = S.replace(T,R+"?");
  25.       document.all[i].src=S;
  26.     }
  27.   }
  28. }
  29.  
  30.